//  Add these scripts to Sphereitemb1.scp and Sphereitemb2.scp.  Please replace all scripts if
//  they already exist.  Remember to back up all previous scripts before replacing with others.

//  House Menu System v5.0h for use with Sphere v54.x
//  Created by Admin Vaticus

// Sphereitemb2.scp scripts here:

[ITEMDEF 0bd1]
//brass sign
DEFNAME=i_sign_brass
TYPE=T_SIGN_GUMP
TDATA2=064
FLIP=1
RESOURCES=2 I_BOARD, 1 i_ingot_iron
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2 

ON=@DCLICK
IF <SRC.TARG.LINK.BASEID>==0
RETURN 0
ELSE
IF (<SRC.UID> == <LINK.MORE>)
MORE2 0
TYPE 2001
LINK.TYPE 2001 DIALOG d_house_menu_own
RETURN 1
ELSE
DIALOG d_house_nonown
SRC.SYSMESSAGE This house is properly placed.
SRC.SYSMESSAGE This house is of modern design.
RETURN 1
ENDIF

[TYPEDEF 2000]
ON=@DCLICK
IF <SRC.TARG.LINK.BASEID>==0
RETURN 0
ELSE
IF (<SRC.ACCOUNT.PLEVEL>>4)
DIALOG d_house_admin
SRC.SYSMESSAGE Welcome back to the house, sir! 
RETURN 1
ELSE
IF (<SRC.UID> == <LINK.MORE>)
DIALOG d_house_ownpub
SRC.SYSMESSAGE Welcome back to the house, friend! 
RETURN 1
ELSE
IF (<SRC.UID> == <LINK.MORE2>)
DIALOG d_house_ownpub
SRC.SYSMESSAGE Welcome back to the house, friend! 
RETURN 1
ELSE
IF (<SRC.UID> == <MORE2>)
DIALOG d_house_ownpub
SRC.SYSMESSAGE Welcome back to the house, friend! 
RETURN 1
ELSE
DIALOG d_house_nonown
SRC.SYSMESSAGE This house is properly placed.
SRC.SYSMESSAGE This house is of modern design.
RETURN 1
ENDIF 

[TYPEDEF 2001] 
ON=@DCLICK
IF <SRC.TARG.LINK.BASEID>==0
RETURN 0
ELSE
IF (<SRC.ACCOUNT.PLEVEL>>4)
DIALOG d_house_admin
SRC.SYSMESSAGE Welcome back to the house, sir! 
RETURN 1
ELSE
IF (<SRC.UID> == <LINK.MORE>)
DIALOG d_house_ownpriv
SRC.SYSMESSAGE Welcome back to the house, friend! 
RETURN 1
ELSE
IF (<SRC.UID> == <LINK.MORE2>)
DIALOG d_house_ownpriv
SRC.SYSMESSAGE Welcome back to the house, friend! 
RETURN 1
ELSE
IF (<SRC.UID> == <MORE2>)
DIALOG d_house_ownpriv
SRC.SYSMESSAGE Welcome back to the house, friend! 
RETURN 1
ELSE
DIALOG d_house_nonown
SRC.SYSMESSAGE This house is properly placed.
SRC.SYSMESSAGE This house is of modern design.
RETURN 1
ENDIF 

[TYPEDEF 2002]
ON=@DCLICK
IF <SRC.TARG.LINK.BASEID>==0
RETURN 0
ELSE
LINK.MORE=<SRC.SERIAL> 
LINK.MORE2=0
LINK.AMOUNT=0
MORE2=0
SRC.SYSMESSAGE You have claimed ownership of this house!
TYPE 2001
LINK.TYPE 2001
RETURN 1




// Sphereitemb1.scp scripts here:


[ITEMDEF 06a5]
DEFNAME=i_door_wood
RESOURCES=25 I_BOARD
TYPE=T_DOOR
CATEGORY=Buildings - Doors
SUBSECTION=Wooden Door 1
DESCRIPTION=@ (n / sw)
DUPELIST=06a7,06a9,06ab,06ad,06af,06b1,06b3

ON=@DCLICK
IF <LINK.TYPE>=2001
LINK.AMOUNT=<SRC.TARG.LINK.AMOUNT>+1
RETURN 0
ENDIF
IF (<LINK.TYPE>==2000)
LINK.AMOUNT=<SRC.TARG.LINK.AMOUNT>+1
TYPE=3
RETURN 0
ENDIF
RETURN 0


[ITEMDEF 06c5]
DEFNAME=i_door_metal_2
RESOURCES=45 i_ingot_iron
TYPE=T_DOOR
CATEGORY=Buildings - Doors
SUBSECTION=Metal Door 2
DESCRIPTION=@ (n / sw)
DUPELIST=06c7,06c9,06cb,06cd,06cf,06d1,06d3

ON=@DCLICK
IF <LINK.TYPE>=2001
LINK.AMOUNT=<SRC.TARG.LINK.AMOUNT>+1
RETURN 0
ENDIF
IF (<LINK.TYPE>==2000)
LINK.AMOUNT=<SRC.TARG.LINK.AMOUNT>+1
TYPE=3
RETURN 0
ENDIF
RETURN 0
